<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0//EN" "http://www.w3.org/TR/REC-html40/strict.dtd">
<html><head><meta name="qrichtext" content="1" /><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><style type="text/css">
p, li { white-space: pre-wrap; }
</style></head><body style=" font-family:'MS Shell Dlg 2'; font-size:10pt; font-weight:400; font-style:normal;">
<p style=" margin-top:0px; margin-bottom:10px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">VBA Excel. Работа с текстом (функции)</span></p>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-style:italic;">Работа с текстом в коде VBA Excel. Функции, оператор </span><span style=" font-family:'Courier New'; font-size:11pt; font-style:italic; color:#333333; background-color:#d0effb;">&amp;</span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-style:italic;"> и другие ключевые слова для работы с текстом. Примеры использования некоторых функций и ключевых слов.</span></p>
<p style=" margin-top:32px; margin-bottom:6px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#fafafa;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600; color:#333333;">Содержание</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a href="https://vremya-ne-zhdet.ru/vba-excel/rabota-s-tekstom/#Funkcii_dla_raboty_s_tekstom"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">1. Функции для работы с текстом</span></a></p>
<p style=" margin-top:2px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a href="https://vremya-ne-zhdet.ru/vba-excel/rabota-s-tekstom/#Klucevye_slova_dla_raboty_s_tekstom"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">2. Ключевые слова для работы с текстом</span></a></p>
<p style=" margin-top:2px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a href="https://vremya-ne-zhdet.ru/vba-excel/rabota-s-tekstom/#Primery"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">3. Примеры</span></a></p>
<p style=" margin-top:2px; margin-bottom:0px; margin-left:14px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a href="https://vremya-ne-zhdet.ru/vba-excel/rabota-s-tekstom/#Vyvod_pramyh_parnyh_kavycek"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">3.1. Вывод прямых парных кавычек</span></a></p>
<p style=" margin-top:2px; margin-bottom:0px; margin-left:14px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a href="https://vremya-ne-zhdet.ru/vba-excel/rabota-s-tekstom/#Otobrazenie_slov_naoborot"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">3.2. Отображение слов наоборот</span></a></p>
<p style=" margin-top:2px; margin-bottom:0px; margin-left:14px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a href="https://vremya-ne-zhdet.ru/vba-excel/rabota-s-tekstom/#Pecatnaa_masinka"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">3.3. Печатная машинка</span></a></p>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="Funkcii_dla_raboty_s_tekstom"></a><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Ф</span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">ункции для работы с текстом</span></p>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt;">Основные функции для работы с текстом в VBA Excel:</span></p>
<table border="1" style=" margin-top:0px; margin-bottom:20px; margin-left:0px; margin-right:0px;" cellspacing="2" cellpadding="0"><thead>
<tr>
<td width="25%" bgcolor="#eaeaea" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:10;">
<p align="center" style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600; background-color:#eaeaea;">Функция</span></p></td>
<td width="75%" bgcolor="#eaeaea" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:10;">
<p align="center" style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600; background-color:#eaeaea;">Описание</span></p></td></tr></thead>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Asc</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает числовой код символа, соответствующий первому символу строки. Например:</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-style:italic;">MsgBox Asc(«/Stop»)</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">. Ответ: 47, что соответствует символу «/».</span></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Chr</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(код символа)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает строковый символ по указанному коду. Например:</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-style:italic;">MsgBox Chr(47)</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">. Ответ: «/».</span></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Format</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(Expression, [FormatExpression], [FirstDayOfWeek], [FirstWeekOfYear])</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Преобразует число, дату, время в строку (тип данных Variant (String)), отформатированную в соответствии с инструкциями, включенными в выражение формата.</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsiya-format/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">InStr</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">([начало], строка1, строка2, [сравнение])</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает порядковый номер символа, соответствующий первому вхождению одной строки (строка2) в другую (строка1) с начала строки.</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsiya-instr/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">InstrRev</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка1, строка2, [начало, [сравнение]])</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает порядковый номер символа, соответствующий первому вхождению одной строки (строка2) в другую (строка1) с конца строки.</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsiya-instrrev/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Join</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(SourceArray,[Delimiter])</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает строку, созданную путем объединения нескольких подстрок из</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/massivy/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">массива</span></a><span style=" font-family:'DejaVu Sans'; font-size:11pt;">. </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsiya-join-parametry/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">LCase</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Преобразует буквенные символы строки в нижний регистр.</span></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Left</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка, длина)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает левую часть строки с заданным количеством символов.</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsii-left-mid-right/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Len</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает число символов, содержащихся в строке.</span></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">LTrim</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает строку без начальных пробелов (слева).</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/udaleniye-lishnikh-probelov/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Mid</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка, начало, [длина])</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает часть строки с заданным количеством символов, начиная с указанного символа (по номеру).</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsii-left-mid-right/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Replace</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(expression, find, replace, [start], [count], [compare])</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает строку, полученную в результате замены одной подстроки в исходном строковом выражении другой подстрокой указанное количество раз.</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsiya-replace/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Right</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка, длина)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает правую часть строки с заданным количеством символов.</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsii-left-mid-right/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">RTrim</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает строку без конечных пробелов (справа).</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/udaleniye-lishnikh-probelov/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Space</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(число)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает строку, состоящую из указанного числа пробелов.</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsii-space-string-strreverse/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Split</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(Expression,[Delimiter],[Limit],[Compare])</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает одномерный</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/massivy/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">массив</span></a><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> подстрок, извлеченных из указанной строки с разделителями. </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsiya-split-parametry/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">StrComp</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка1, строка2, [сравнение])</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает числовое значение Variant (Integer), показывающее результат сравнения двух строк.</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsiya-strcomp/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">StrConv</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(string, conversion)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Изменяет регистр символов исходной строки в соответствии с заданным параметром «conversion».</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsiya-strconv/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">String</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(число, символ)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает строку, состоящую из указанного числа символов. В выражении «символ» может быть указан кодом символа или строкой, первый символ которой будет использован в качестве параметра «символ».</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsii-space-string-strreverse/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">StrReverse</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает строку с обратным порядком следования знаков по сравнению с исходной строкой.</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsii-space-string-strreverse/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Trim</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает строку без начальных (слева) и конечных (справа) пробелов.</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/udaleniye-lishnikh-probelov/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">UCase</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Преобразует буквенные символы строки в верхний регистр.</span></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Val</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Возвращает символы, распознанные как цифры с начала строки и до первого нецифрового символа, в виде числового значения соответствующего типа.</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><a href="https://vremya-ne-zhdet.ru/vba-excel/funktsiya-val/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Подробнее…</span></a></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">WorksheetFunction.Trim</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">(строка)</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Функция рабочего листа, которая удаляет все лишние пробелы (начальные, конечные и внутренние), оставляя внутри строки одиночные пробелы.</span></p></td></tr></table>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt;">В таблице перечислены основные функции VBA Excel для работы с текстом. С полным списком всевозможных функций вы можете ознакомиться на </span><a href="https://docs.microsoft.com/ru-ru/office/vba/language/reference/functions-visual-basic-for-applications"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">сайте разработчика</span></a><span style=" font-family:'DejaVu Sans'; font-size:11pt;">.</span></p>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="Klucevye_slova_dla_raboty_s_tekstom"></a><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">К</span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">лючевые слова для работы с текстом</span></p>
<table border="1" style=" margin-top:0px; margin-bottom:20px; margin-left:0px; margin-right:0px;" cellspacing="2" cellpadding="0"><thead>
<tr>
<td width="25%" bgcolor="#eaeaea" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:10;">
<p align="center" style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600; background-color:#eaeaea;">Ключевое слово</span></p></td>
<td width="75%" bgcolor="#eaeaea" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:10;">
<p align="center" style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600; background-color:#eaeaea;">Описание</span></p></td></tr></thead>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">&amp;</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Оператор</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">&amp;</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> объединяет два выражения (</span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-style:italic;">результат = выражение1 &amp; выражение2</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">). Если выражение не является строкой, оно преобразуется в Variant (String), и результат возвращает значение Variant (String). Если оба выражения возвращают строку, результат возвращает значение String.</span></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">vbCrLf</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Константа</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">vbCrLf</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> сочетает в себе возврат каретки и перевод строки (Chr(13) + Chr(10)) и переносит последующий текст на новую строку (</span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-style:italic;">результат = строка1 &amp; vbCrLf &amp; строка2</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">).</span></p></td></tr>
<tr>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">vbNewLine</span></p></td>
<td bgcolor="#fff7ec" style=" padding-left:20; padding-right:20; padding-top:20; padding-bottom:20;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; background-color:#fff7ec;">Константа</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> </span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">vbNewLine</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> в VBA Excel аналогична константе vbCrLf, также сочетает в себе возврат каретки и перевод строки (Chr(13) + Chr(10)) и переносит текст на новую строку (</span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-style:italic;">результат = строка1 &amp; vbNewLine &amp; строка2</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">).</span></p></td></tr></table>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="Primery"></a><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">П</span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">римеры</span></p>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="Vyvod_pramyh_parnyh_kavycek"></a><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">В</span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">ывод прямых парных кавычек</span></p>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt;">Прямые парные кавычки в VBA Excel являются спецсимволами и вывести их, заключив в самих себя или в одинарные кавычки (апострофы), невозможно. Для этого подойдет функция </span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Chr</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">:</span></p>
<p style="-qt-paragraph-type:empty; margin-top:12px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; font-family:'Verdana,Arial,sans'; font-size:11pt; font-weight:496; background-color:#fdfdfd;"><br /></p>
<table border="0" style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px;" cellspacing="2" cellpadding="0">
<tr>
<td bgcolor="#dfefff" style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;"></td>
<td style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff459518879386639717-1"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">S</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">ub</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Primer1</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">()</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff459518879386639717-2"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ff8000;">'Вывод одной прямой парной кавычки</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff459518879386639717-3"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">M</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">sgBox </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Chr</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ce0000;">34</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff459518879386639717-4"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ff8000;">'Отображение текста в прямых кавычках</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff459518879386639717-5"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">M</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">sgBox </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Chr</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ce0000;">34</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> &amp; </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#008000;">&quot;Волга&quot;</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> &amp; </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Chr</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ce0000;">34</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff459518879386639717-6"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ff8000;">'Вывод 10 прямых парных кавычек подряд</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff459518879386639717-7"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">M</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">sgBox </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">String</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ce0000;">10</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">,</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Chr</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ce0000;">34</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">))</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff459518879386639717-8"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">E</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">nd</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Sub</span></p></td></tr></table>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="aswift_1_host"></a><span style=" font-family:'DejaVu Sans'; font-size:11pt;">С</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">мотрите интересное решение по выводу прямых кавычек с помощью прямых кавычек в первом комментарии.</span></p>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="Otobrazenie_slov_naoborot"></a><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">О</span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">тображение слов наоборот</span></p>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Преобразование слова «налим» в «Милан»:</span></p>
<p style="-qt-paragraph-type:empty; margin-top:12px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; font-family:'Verdana,Arial,sans'; font-size:11pt; font-weight:496; background-color:#fdfdfd;"><br /></p>
<table border="0" style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px;" cellspacing="2" cellpadding="0">
<tr>
<td bgcolor="#dfefff" style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;"></td>
<td style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff459518893202132739-1"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">S</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">ub</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Primer2</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">()</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff459518893202132739-2"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">D</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">im</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">stroka</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff459518893202132739-3"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> = </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#008000;">&quot;налим&quot;</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff459518893202132739-4"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> = </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">StrReverse</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ff8000;">'милан</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff459518893202132739-5"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> = </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">StrConv</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">,</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ce0000;">3</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ff8000;">'Милан</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff459518893202132739-6"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">M</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">sgBox </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">stroka</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff459518893202132739-7"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">E</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">nd</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Sub</span></p></td></tr></table>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt;">или одной строкой:</span></p>
<p style="-qt-paragraph-type:empty; margin-top:12px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; font-family:'Verdana,Arial,sans'; font-size:11pt; font-weight:496; background-color:#fdfdfd;"><br /></p>
<table border="0" style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px;" cellspacing="2" cellpadding="0">
<tr>
<td bgcolor="#dfefff" style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;"></td>
<td style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff459518897377405390-1"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">S</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">ub</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Primer3</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">()</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff459518897377405390-2"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">M</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">sgBox </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">StrConv</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">StrReverse</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#008000;">&quot;налим&quot;</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">),</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ce0000;">3</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff459518897377405390-3"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">E</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">nd</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Sub</span></p></td></tr></table>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">Преобразование слова «лето» в «отель»:</span></p>
<p style="-qt-paragraph-type:empty; margin-top:12px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; font-family:'Verdana,Arial,sans'; font-size:11pt; font-weight:496; background-color:#fdfdfd;"><br /></p>
<table border="0" style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px;" cellspacing="2" cellpadding="0">
<tr>
<td bgcolor="#dfefff" style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;"></td>
<td style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff45951889a218221090-1"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">S</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">ub</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Primer4</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">()</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff45951889a218221090-2"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">D</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">im</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">stroka</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff45951889a218221090-3"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> = </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#008000;">&quot;лето&quot;</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff45951889a218221090-4"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> = </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">StrReverse</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ff8000;">'отел</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff45951889a218221090-5"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> = </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> &amp; </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#008000;">&quot;ь&quot;</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ff8000;">'отель</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff45951889a218221090-6"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">M</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">sgBox </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">stroka</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff45951889a218221090-7"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">E</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">nd</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Sub</span></p></td></tr></table>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt;">или одной строкой:</span></p>
<p style="-qt-paragraph-type:empty; margin-top:12px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; font-family:'Verdana,Arial,sans'; font-size:11pt; font-weight:496; background-color:#fdfdfd;"><br /></p>
<table border="0" style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px;" cellspacing="2" cellpadding="0">
<tr>
<td bgcolor="#dfefff" style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;"></td>
<td style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff4595188a0663156725-1"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">S</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">ub</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Primer5</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">()</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff4595188a0663156725-2"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">M</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">sgBox </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">StrReverse</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#008000;">&quot;лето&quot;</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> &amp; </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#008000;">&quot;ь&quot;</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff4595188a0663156725-3"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">E</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">nd</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Sub</span></p></td></tr></table>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="Pecatnaa_masinka"></a><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">П</span><span style=" font-family:'DejaVu Sans'; font-size:11pt; font-weight:600;">ечатная машинка</span></p>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt;">Следующий код VBA Excel в замедленном режиме посимвольно печатает указанную строку на пользовательской </span><a href="https://vremya-ne-zhdet.ru/vba-excel/modul-protsedura-forma/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">форме</span></a><span style=" font-family:'DejaVu Sans'; font-size:11pt;">, имитируя печатную машинку.</span></p>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt;">Для реализации этого примера понадобится пользовательская форма (UserForm1) с </span><a href="https://vremya-ne-zhdet.ru/vba-excel/element-upravleniya-label/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">надписью</span></a><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> (Label1) и </span><a href="https://vremya-ne-zhdet.ru/vba-excel/element-upravleniya-commandbutton/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">кнопкой</span></a><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> (CommandButton1):</span></p>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><span style=" font-family:'DejaVu Sans'; font-size:11pt;">Код имитации печатной машинки состоит из двух процедур, первая из которых замедляет выполнение второй, создавая паузу перед отображением очередного символа, что и создает эффект печатающей машинки:</span></p>
<p style="-qt-paragraph-type:empty; margin-top:12px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; font-family:'Verdana,Arial,sans'; font-size:11pt; font-weight:496; background-color:#fdfdfd;"><br /></p>
<table border="0" style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px;" cellspacing="2" cellpadding="0">
<tr>
<td bgcolor="#dfefff" style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;"></td>
<td style=" vertical-align:top; padding-left:0; padding-right:0; padding-top:0; padding-bottom:0;">
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-1"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">S</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">ub</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">StopSub</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Pause </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">As</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Single</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-2"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">D</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">im</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Start </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">As</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Single</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-3"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">S</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">tart</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> = </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Timer</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-4"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Do</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">While</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">Timer</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> &lt; </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">Start</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> + </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Pause</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-5"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">      </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">DoEvents</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-6"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Loop</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-7"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">E</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">nd</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Sub</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-8"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#000000; background-color:#f7f7f7;"> </span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-9"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">P</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">rivate</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Sub</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">CommandButton1_Click</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">()</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-10"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">D</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">im</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">stroka </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">As</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">String</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">,</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#000000;">i</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">As</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Byte</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-11"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">s</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">troka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> = </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#008000;">&quot;Печатная машинка!&quot;</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-12"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">L</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">abel1</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">.</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">Caption</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> = </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#008000;">&quot;&quot;</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-13"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">For</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">i</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> = </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ce0000;">1</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">To</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Len</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-14"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">       </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Call</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">StopSub</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ce0000;">0.25</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ff8000;">'пауза в секундах</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-15"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">       </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ff8000;">'следующая строка кода добавляет очередную букву</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-16"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">       </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">Label1</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">.</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">Caption</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> = </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">Label1</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">.</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">Caption</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> &amp; </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#004ed0;">Mid</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">(</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">stroka</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">,</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#002d7a;">i</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">,</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#ce0000;">1</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#333333;">)</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-17"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;">   </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Next</span></p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#f7f7f7;"><a name="urvanov-syntax-highlighter-64ff4595188a7803317863-18"></a><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">E</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">nd</span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#006fe0;"> </span><span style=" font-family:'inherit'; font-size:11pt; font-weight:496; color:#800080;">Sub</span></p></td></tr></table>
<p style=" margin-top:0px; margin-bottom:30px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;"><a name="aswift_2_host"></a><span style=" font-family:'DejaVu Sans'; font-size:11pt;">О</span><span style=" font-family:'DejaVu Sans'; font-size:11pt;">бе процедуры размещаются в </span><a href="https://vremya-ne-zhdet.ru/vba-excel/modul-protsedura-forma/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">модуле</span></a><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> формы. Нажатие кнопки CommandButton1 запустит замедленную печать символов в поле надписи, имитируя печатную машинку.</span></p>
<hr />
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; background-color:#e6e6fa;"><a href="https://vremya-ne-zhdet.ru/vba-excel/soderzhaniye-rubriki/"><span style=" font-family:'DejaVu Sans'; font-size:11pt; text-decoration: underline; color:#0000ff;">Содержание рубрики VBA Excel</span></a><span style=" font-family:'DejaVu Sans'; font-size:11pt;"> по тематическим разделам со ссылками на все статьи.</span></p></body></html>